﻿#pragma once
#include <iostream>
#include <vector>
using namespace std;
namespace hash_bucket
{
	template<class T>
	struct HashNode
	{
		T _data;
		HashNode<T>* _next;
		HashNode(const T& data = T())
			:_data(data)
			, _next(nullptr)
		{}
	};


	// K 为 T 中key的类型
	// T 可能是键值对，也可能是K
	// KeyOfT: 从T中提取key
	// Hash将key转化为整形，因为哈市函数使用除留余数法
	template<class K, class T, class KeyOfT, class Hash>
	class HashTable
	{

		typedef HashNode<T> Node;
	public:
		KeyOfT Kkey; 
		Hash jy;     
		HashTable()
		{
			_tables.resize(__stl_next_prime(0), nullptr);
		}
		inline unsigned long __stl_next_prime(unsigned long n)
		{
			static const int __stl_num_primes = 28;
			static const unsigned long __stl_prime_list[__stl_num_primes] =
			{
			53, 97, 193, 389, 769,
			1543, 3079, 6151, 12289, 24593,
			49157, 98317, 196613, 393241, 786433,
			1572869, 3145739, 6291469, 12582917, 25165843,
			50331653, 100663319, 201326611, 402653189, 805306457,
			1610612741, 3221225473, 4294967291
			};
			const unsigned long* first = __stl_prime_list;
			const unsigned long* last = __stl_prime_list +
				__stl_num_primes;
			const unsigned long* pos = lower_bound(first, last, n);
			return pos == last ? *(last - 1) : *pos;
		}

		// 拷⻉构造和赋值拷⻉需要实现深拷⻉
		HashTable(const HashTable& cur)
		{
			_n = cur._n;
			_tables.resize(cur._tables.size(), nullptr);
			for (int i = 0; i < _tables.size(); i++)
			{
				//递归
				structnode(cur._tables[i], _tables[i]);
			}
		}

		HashTable& operator=(const HashTable& Cur)
		{
			if (this != &Cur)
			{
				Node* cur = nullptr;
				for (int i = 0; i < _tables.size(); i++)
				{
					while (_tables[i])
					{
						cur = _tables[i]->_next;
						delete _tables[i];
						cout << "delete ";
						_tables[i] = cur;
					}
				}
				cout << endl;
				//HashTable(Cur);
				_n = Cur._n;
				_tables.resize(Cur._tables.size(), nullptr);
				for (int i = 0; i < _tables.size(); i++)
				{
					//递归
					structnode(Cur._tables[i], _tables[i]);
				}
				return *this;
			}
		}
		// 哈希桶的销毁
		~HashTable()
		{
			Node* cur = nullptr;
			for (int i = 0; i < _tables.size(); i++)
			{
				while (_tables[i])
				{
					cur = _tables[i]->_next;
					delete _tables[i];
					cout << "delete ";
					_tables[i] = cur;
				}
			}
			cout << endl;
		}

		size_t size()
		{
			return _n;
		}
		// 插入值为data的元素，如果data存在则不插入
		bool Insert(const T& data)
		{
			if (Find(Kkey(data)))
				return false;

			if (_n == _tables.size())
			{
				vector <Node*> newtable(__stl_next_prime(_tables.size() + 1),nullptr);
				size_t hashi = jy(Kkey(data)) % _tables.size();
				for (int i = 0; i < _tables.size(); i++)
				{
					//这里需要重新映射
					while (_tables[i])
					{
						size_t hashi = jy(Kkey(_tables[i]->_data)) % _tables.size();
						newtable[hashi] = _tables[i];
						_tables[i] = _tables[i]->_next;
					}
					swap(_tables, newtable);
				}

				//newtable.insert(data);
			}

			size_t hashi = jy(Kkey(data)) % _tables.size();
			if (_tables[hashi] == nullptr)
			{
				_tables[hashi] = new Node (data);
				_n++;
			}

			//头插
			else
			{
				Node* newnode = new Node(data);
				newnode->_next = _tables[hashi];
				_tables[hashi] = newnode;
				_n++;
			}
			return true;
		}

		void Print()
		{
			Node* cur = nullptr;
			for (int i = 0; i < _tables.size(); i++)
			{
				cur = _tables[i];
				while (cur)
				{
					cout << cur->_data << ' ';
					cur = cur->_next;

				}
			}
			cout << endl;
		}
		// 在哈希桶中查找值为key的元素，存在返回true否则返回false﻿
		Node* Find(const K key)
		{
			size_t hashi = jy(key) % _tables.size();
			Node* cur = _tables[hashi];
			while (cur)
			{
				if (Kkey(cur->_data) == key)
				{
					return cur;
				}
				cur = cur->_next;
			}
			return nullptr;
		}

		// 哈希桶中删除key的元素，删除成功返回true，否则返回false
		bool Erase(const K& key)
		{
			if (!Find(key))
			{
				return false;
			}
			size_t hashi = jy(key) % _tables.size();
			Node* cur = _tables[hashi];
			Node* parent = nullptr;
			while (cur)
			{
				if (Kkey(cur->_data) == key)
				{
					if (parent == nullptr)
					{
						_tables[hashi] = cur->_next;
					}
					else
					{
						parent->_next = cur->_next;

					}
					delete cur;
					--_n;
					return true;
				}
			}
			return false;
		}

	

	private:
		
		vector <Node*> _tables;  // 指针数组
		size_t _n = 0;			// 表中存储数据个数
		void structnode(Node* root, Node*& copy)
		{
			if (root == nullptr)
			{
				return;
			}
			copy = new Node;
			structnode(root->_next, copy->_next);
			copy->_data = root->_data;
		}
	};
}	
